home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
scope
/
151-175
/
scopedisk168
/
asmmacros
/
am_02
/
freemem.i
< prev
next >
Wrap
Text File
|
1995-03-19
|
602b
|
24 lines
NOLIST
FreeMem MACRO ; 14 Sept 88
*------------------------------; Start of FreeMem macro.
; Make A1 point to the memory block start
; and put the block size in D0.
NOLIST
IFEQ ReEntrant-1
LIST
MOVEA.L \1.Adr(A5),A1
MOVE.L \1.Size(A5),D0
NOLIST
ENDC
IFNE ReEntrant-1
LIST
MOVEA.L \1.Adr,A1
MOVE.L \1.Size,D0
NOLIST
ENDC
LIST
CallLib FreeMem,exec ; Call FreeMem.
*------------------------------; End of FreeMem macro.
ENDM
LIST